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BASIC-E operates on the IMSAI 8080 under’ the CP/M 


BASIC-E 
Teas Tt 


INTRODUCTION TO BASIC-E 


BASIC-E is a compiled, scientifically-oriented, fast-executing 
BASIC language processor. BASIC-E was written by Gordon E. 
Eubanks, Jr. at the Naval Postgraduate School, Monterey, 
California, and is in the public domain. Although IMSAI has no 
current plans to maintain it, we feel this BASIC will be a useful 
and valuable programming tool. A copy of BASIC-E is being 


included with each order for IMSAI CP/M version 1.31 revision 1 
or newer. 


floppy dise 
operating system in a minimum of 20K of RAM. 


The BASIC-E language features include sequential and random 
diskette file capabilities, a wide range of predefined functions, 
user-defined functions, and strings up to 255 characters long. 
Arrays may have any number of subscripts and may be string or 
numeric. Ina string array, each element can be a string of up 
to 255 characters. Numbers in BASIC-E are represented internally 
in binary floating point and approximately 7 significant decimal 
digits are carried. BASIC-E currently has no provision for 


formatted printing, and no provision for calling machine language 
subroutines. 


Unlike most microcomputer BASICs, BASIC-E is not interactive. 
Rather than typing statements into the BASIC language processor, 
the user prepares a file containing the desired program (usually 


the editor ~8.uwsed to do this), < then compiles: it with the 
BASIC=E compiler, then executes it as many times as he wishes 
with the BASIC-E run-time interpreter. Since the program is 
stored in source language form on a disk fille, many of the 


operating system's facilities -- ED, READ, TYPE, LIST, ete. -- 
may be applied to it. Similarly, data files produced and used by 


BASIC-E programs are in ASCII form and can be EDited, READ, 
TYPEQ, “Liset ed, €0c. 


In the documentation distributed with IMSAI CP/M, Gordon Eubanks'! 
"BASIC-E Reference Manual" follows this introduction; it should 


be consulted for more detailed information than given in the 
following summaries. 
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BASIC-E Language Summary w 
Numbers 
@ Range 2.7E-39 to 3.6E38 

28s Approximately 7 significant decimal digits are 

2? 3 represented. 

7,38 
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VSN 


May contain 0 to 255 ASCII characters. Storage for 
strings is automatically allocated as required during 
program execution. In a string array = (subscripted 
string -variable) each element is a separate string of 
characters. 


Names (identifiers) 


Variable names may be up to 31 
first character must be a 


characters 
Letter, digit, or period. 


long. The 
letter; 


the rest must be 


Numeric operators 


| ), eee iy Ts 


oo ee eet ree (relational ) 
bt. LE, Gl, Gh, 2C.-a2 (same as preceding line) 
NOT, AND, OR 


String Operators 


of 


(concatenation) 
relational operators as above 


Statements - General 


Line numbers are optional in BASIC-E programs except as 
required on lines referenced by GOTO, GOSUB, etc. 
Multiple statements on one line should be seperated by 
Pam, > Céxcept IF, -DiM, DEF. and END should be the only 
| statement on the line). 


A statement may be continued 
on the next line if a \ precedes the carriage return. 
Long variable names and remarks may be used freely as 
Prey do not -effect .the size of. the program arter 
compilation. 


= 
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Statement Types 





THEN line number 
THEN any statement 
THEN se Bue 
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.. GOTO list of line numbers 


ON GOSUB list of line numbers 
RANDOMIZE 


PRINT 
READ 


OUT port, data 
DATA 
. RESTORE 
REM 
END 


DIM Statements 


DIM name(dimensions) ,name(dimensions),... 


Any number of subscripts are allowed. All arrays must 
be DiMensioned and the DIM statement should appear in 
the program before the array is referenced. 


Examples: DIM N(100) 


DIM BIG(2,4,3,3,2,2,8), DATASTRINGS$(10,5,23) 
User-Defined Functions 


DEF FNname(arguments)=expression 


Examples: DEF FNA(X+Y)=X+Y-A 


DEF FNXY.COMBINE$(A$+B$)=A$+", "+B$ 
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Sequential File Operations 


FILE variable$, variable$ 


Opens one or more files. Each string variable's 
value is taken as the name of a file to open; the 
first file opened is #1, the second, #2, etc. Up 
to six files can be open at one time. 


PRINT #filenumber; list 


Outputs a list of variables or expressions to 


the 
indicated i.e 'tiienumber” s2 8. numeric 
expression; note the # before filenumber and the ; 
ar Ler 2. 


READ #filenumber; list 


Reads a -ilist of 


variables from 
rile. 


indicated open 
CLOSE filenumber, filenumber 
Closes one or more files. 


IF END #filenumber THEN line number 


Specifies line number -to GGIO = 17 .and when. a 


subsequent INPUT attempts to read beyond the end 
of the indicated file. 


Random Access File Operations 


FILE variable$ (recordlen), variable$ (recordlen) 


Opens files for Random access. Recordlen. is an 
expression specifying the length of each record in 
the file, that. 18, how many bytes. are to be 
transmitted with each PRINT or INPUT statement. 


PRINT #filenumber, 


| recordnumber; list 
READ #filenumber, 


recordnumber; list 


These access the specified record-of a file. 
that there is a comma before the record 
expression and a semicolon after it. 


Note 
number 
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Predefined Numeric Functions 


X represents any numeric expression 


ABS(X) 
ATN(X) 
COS(X) 


COSH(X) hyperbolic cosine 
FRE 


number of bytes of unused storage 
INP(X) input from port X 3 


carriage position 
random number between OQ and 1 


SINH(X) hyperbolic sine 


EXP(X) 
Predefined string functions 


A$ represents any string expression _ 


ASC(A$) 

CHR$(X) 

LEFT$(A$) 

LEN( A$) 
MID$(A$,start,length) 
RIGHT$(A$,length) 
STR$(X) 

VAL( A$) 
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BASIC-E Operation | wa 


To use BASIC-E you must have at least 20K of RAM (many 
applications will require more) and your CP/M operating 
system must be relocated for the amount of RAM 


a7. WBe - as 
2ge described in section 6.97 of the C/M User's Guide. 
orc. 
2'35 BASIC-E source programs reside on diskette files of type 
105 BAS. Usually they are input. from the terminal with the 
aa CP/M ‘editor (ED) or from ‘paper . tape with the CP/M READ 
433 command. Like any other file, a RBASIC-E program may be 
23 Princed out with. the CP/M TYPE or LIST commana, copied to 


another file with PIP, updated with ED, etc. 


Before it can be run, a BASIC-E program must be 


compiled. 
This is done with the CP/M command 


BASIC-E name 


,, Where "name" is the name.of the file containing the program. 
The compilation operation lists the program, types error 
messages if any errors: are found in the program, and 
produces a new file with the same name but of type INT. 


The compiled. program can then be executed with the command 


RUN-E name 


The program can be used as many times as 


desired by 
reentering the RUN-E command. 


To modify the program, EDit the source file (name.BAS), 
recompile it, then reRUN-E it. 


Known Bugs 


1. PRINT sometimes makes an error of one in the seventh 
Sign ficant digit; . thus, for example, 9s may print out. as 
92.-99999. Tris error ogeurs -on printout: and. does not 
effect arithmetic done in the program. 


Notes 


1. The commands to compile and run a BASIC-E program 


are 
"BASIC-E name" and "RUN-E name", as described in the 
operation section above, not "BASIC name" and "RUN name" as 


stated in the BASIC-E Reference Manual. 


ae The RANDOMIZE statement is effective only if an INPUT 
statement has been executed earlier in the program. The 
variable time it takes the user to respond at the terminal 
is used to randomize the random number generator. 
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3. The description of the READ statement on 
rather confused The 


page 44 is 
: three forms 
are: 


of the READ statement 


(1) [<line number>] READ #<expression>, <expression>; 
2ee <variable>{,<variable>} | 
a-~. 3 7 3 
a8 To read a random record from a specified file 
Ae. Sm iz 
298 (2) [<line number>] READ #<expression>; |. ee 
483 <varlable>{,;<variable>}.. .<..553 Te 
*o To read the next sequential record — from a ;: 
| specified file. 
(3) [<line number>] READ <variable>{,<variable>} - 
To read values from DATA statements’ in the 
program. ae 
4. A CLOSE statement sometimes’ produces n apparently 
erronious error message from the compiler. Usually the 
CLOSE statement can be omitted as Ait tc oeee are 
"o automatically closed at the end of program execution. 
| =e In some cases, when a file is written with a BASIC-E 
“program, garbage 18 left. in the file after the last. record. 
This garbage shows up when the file is later TYPEd, 
or EDited. 


Listed, 
If you have trouble with this problem try putting 
an ASCII control-Z character 


PRINT #n; CHR$(26) 


where n is the file number. 
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I. INTRODUCTION 


This manual describes the Naval Postgraduate Schoo} 
BASIC Language (8ASIC-$E). BASIC-E is an extension of the 
BASIC language for the 8080 microprocessor. It consists o f 
two subsystems, the compiler and the cun@tine wea ter. The 
compiler syntax checks a BASIC=E source program producing an 
object file which may then be executed by the ae ee ae moni= 


tore 


BASIC"E is intended to be used in the interactive mode 


with a CRI or teletype terminal. It includes most features 
of the proposed ANSI standard-BASIC [1] as well as extensive 
string manipulation and file input/output capabilities, 
BASIC=E penis @ resident disk operating system to handle 


} 


input/output operations and disk file management-. The 


source proaram is assumed to reside on the disk. 


The BASIC=E compiler consists of a table=driven parser 
which checks statements for correct syntax and generates 
code for the BASIC“E machine. The code is executed by the 
run time monitor. The machine is a zero address stack com= 
puter. Floating point arithmetic numbers are represented in 
3e bits with an 8 bit exponents, one bit sign and twenty-four 
bits of fraction. This provides slightly -more than seven 


decimal digits of significance. Variable length strings and 


n dimensional arrays are both dynamically allocated. 
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Secti } 
ection II of this manual describes the 


mentse Section III a 
nage provides operating instructions’ for 

“E. The appendices list compiler and = run=tim 
messages, the formal grammar for BASIC@$E, "oe 
glese 


: and compiler tog= 
ee] ry h f Y's 
Ref ences ere included 1 t e bibliog 8p 
. : 








ay s}y6u liv 
797] URS 
4u09 “DW iwswi . 46+ ® 


SPIMP|IOM ‘pansaoe 


"w'S'N ul epBW "VO ‘OUPUe 





II. DESCRIPTION OF THE BASIC#E LANGUAGE 


Elements of BASIC-E are listed in alphabetical ‘order 


in 
this section of the manual. A synopsis of the element is 
shown, followed by a description and examples of Its use. 


The intent 1S to provide a reference to the features of this 
implementation of BASIC and not to teach the BASIC language. 


References [2,3] orovide a good introduction to BASIC proe 


gramming. 


A program consists of one or more properly formed 


BASIC-—E statements. An END statement, if present, tere- 


minates the program, and additional statements are 


Ignored. 
The entire ASCII character set is accepteds but all state= 
ments may be written using the common O64"character subset, 


Section III provides information on source program format. 


In this section the "synopsis" presents the general 


form of the element. Square brackets [(] denote an optional 


feature while braces {} indicate that the enclosed section 


may be repeated zero or more timese Terms enclosed in < > 


are either non-terminal elements of the languages, which are 


further defined im this sections or terminal symbols. Al] 


special characters and capitalized words are terminal sym-= 


bols. 





ELEMENT: 


ABS 
ABS predefined function 





SYNOPSIS: 
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ABS ( <expression> ) 
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DESCRIPTION: 
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epimpl 
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The ABS function returns the 
<expression>. 


absolute value 
point number. 


: of the 
he argument must evaluate to a floating 
EXAMPLES: 


ABS(X) 


ABS(X*Y) 
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ELEMENT: 


ASC. 


ASC predefined function 


SYNOPSIS: 


ASC ( <expression> ) 


DESCRIPTION: 


The ASC function returns the ASCII 
the 


numeric value 
first character of the <expression>. 
must evaluate to a string. 


o f 
te 0 - tay) 


The argument 
If the length of the string 
strina) an error wil] 


occurs 
EXAMPLES: 

ASC (AS) 

ASG ("x") 


ASC(RIGHTS(AS,7)) 
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ELEMENT: 


ATN predefined function 


SYNUPSIS3: 
ATN ( <expression> ) 
DESCRIPTION: 


The ATN~ function 


returns 
<expression>. 


The argument must 
ing point number. 


EXAMPLES: 
ATN(X) 


ATN(SQR(SIN(X))) 
PROGRAMMING NOTE: 
: All other 


inverse trigonometric 
puted from the arctangent using 


the 


functions may be come a 


simple 


ATN 


arctangent of the 
evaluate to a float= 


identities. 








ELEMENT: 


CHRS 
CHRS oredefined function 


SYNOPSIS: 
2e3 CHRS ( <expression> ) 
aos DESCRIPTION: 
3 >@ - 
<2=2 
333 The CHRS function returns a character string of length 
$c 1 consisting of the character whose ASCII equivalent 
is the <expression> converted to an integer modulo 
Leo, The argument must evaluate to a floating point 
numoere 
EXAMPLES: 
CHRS(A) 
CHRS(12) 
i CHRS((A+B/C)*SIN(X)) 


PROGRAMMING NOTE? 


CHRS can be used to send contro] 


characters such as 
linefeed to the output device. 


a 
ment would accomplish this: 


The following state= 


PRINT CHRS$(10) 
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CLOSE 
ELEMENT: 


CLOSE statement 


SYNOPSIS: 


[<line number>] CLOSE <expression> {, 


<expression>} 


DESCRIPTION: 


The CLOSE statement causes the file specified by 
_“expression> to be closed. 


referenced again 
Statement. 


each 
the file may be 


Using a= FILE 


Before 


it must be reopened 





An error occurs 


1f the specified file has 
ously appeared 


not previ- 
in a FILE statement. 
EXAMPLES: 
CLOSE 1 


Po0 CLOSE fy, Ky Laan 


PROGRAMMING NOTES 
On normal completion of a program all open files are 
closed. If the proaram terminates abnormally it is 
possible that files created by the 
lost. . 


program witli = be 


10 





<constant> 
ELEMENTS | 


€ 


<constant>o 


SYNOPSIS: 

Zee [<sian>] <integer> . [ <integer> ] [E <sign> <exp> } é 
ac~. 
a’,2 : 
7,29 ("] <character string> [("] : 
ez0 

333 DESCRIPTION: 

6 

> 


A <constant> may be either a numeric constant or a 
string constant. All numeric constants are stored as 
floating point numbers. Strings may contain any ASCII 
character. 
Numeric constants may be either a signed 
integer, decimal Mumber, or expressed 
notation. Numbers up to 31 characters in length are 
accepted but the floating point representation of the 
number maintains approximatly seven significant digits 
(1 part in 16,000,000). The largest magnitude that 
can be represented is aporoximately 3.6 times ten to 
w the 38th power. The smallest non-zero magnitude that 
| can be represented is approximately 2.7 times ten 
the minus 39th power. 
String constants may be up to. 253-: cheracters -<in 
length. Strinas entered from the consoles, in a data 
statement, or read from a disk file may be either 
enclosed in quotation marks or delimited by a comma. 
Strings used as constants in the program must be 
enclosed in quotation marks. 


or unsigned 
in scientific 


to 


EXAMPLES: 
10 
“100./5659E=-19 


"THIS IS THE ANSWER" 
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ELEMENTS: 


COS 
COS predefined function 





SYNOPSIS3 

@ 
29¢ COS( <expression> ) 
or. ; 
08 DESCRIPTION: 
2$2 
a23 CUS ts a function which 
$¢ 

> 


returns the cosine of the 
<expression>. 


The argument must evaluate to a floating 
point numoer expressed 


in radians. 
A floating point overflow occurs 


of the <expression> 


if the absolute value 
24th cower times pi 


is areater than two raised to the 
radians. 


EXAMPLES: 


COS(B) 


COS(SQR(X-Y)) 





FLEMENTs: 


COSH 
COSH predefined function 


SYNOPSIS? 
) 
233 COSH ( <exporession> ) 
$08 DESCRIPTION: 
428 
32% COSH is a function which returns the hyperbolic cosine 
8S of the <expression>. The argument must evaluate to a 
floating point number, 
EXAMPLES: 
COSH(X) 
COSH(XT2+YTe) 


i3 








DATA 
ELEMENTS: 


DATA statement 


SYNOPSIS: 
e 
28 (<line number>] DATA <constant> {, <constant>} 
298 DESCRIPTION: 
Te 
333 DATA statements define string and floating point cone 
*S Stants which are 


assigned to variables using a READ 
statement. Any number of DATA statements may occur 
@ program. 


The constants are stored consecutively 
a data area as they appnear 


in the program and are 
Syntax checked by the compiler. 

‘Strings may be enclosed in quotation marks or 
ally delimited by commas. 


in 
in 
not 


option= 
EXAMPLES: 


19 DATA 10,0 4¢11.726€31900 


DATA. "X¥Z"st1.r this. 18. A STRING 
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ELEMENT: 


a j 


DEF 
DEF statement 


SYNOPSIS: 

8 
=gs (<lime number>) DEF <function name> (<dummy argument 
2.2 list>) = <expression> 
= 350 
"32 # 
38 
232 DESCRIPTION: 
323 : | 
ec 

2 


The DEF statement specifies a user defined function 
“which returns 2 value of the same type as the <funce 
tion name>. One or more <expressions> are passed to 
the function and used in evaluating the expression. 
The passed values may be in string or floating point 


form but must match the type of the corresponding 
dummy argument. 


Recursive calls are not permitted. 
The <exoression> 


in the define statement may reference 
<variables> other 


than the dummy argumentser in which 
case the current value of the <variable> 


is used in 
evaluating the <exopresssion>. The type of the funce 
re tion must match the type of the <expression>. 


EXAMPLES: 





10 DEF. PNALA Vi}: Sore = OA 


DEF FNBS(AS$,83S) = AS + BS + CH 


DEF FN.COMPUTE(A,B) = A + B = FNA(A,B) + D 
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DIM 
ELEMENT: 


DIM statement 


SYNOPSIS: 


[line number] DIM <identifier> (€ <subscript list> ) 


{,<identifier> ( <subscript Jlist> )} 
DESCRIPTION: 


The dimension statement dynamically allocates space 
for floatine: point or = string arrays. String array 
elements may be of any length up to 255 bytes and 
change in lenath dynamically as they assume different 
values. Initially, all floating point arrays are set 
to zero and all string arrays are null strings. An 
array must be dimensioned expolicitlys no default 
options are provided. Arrays are stored in row major 
order. 
Exoressions in subscript lists are evaluated as floate 
Ing point numbers and rounded to the nearest 
when determining the size of the array. Al} sub= 
scripts have an imolied lower bound of 0. 


When array elements are referenced a check 
ensure the element resides 


integer 


1S made to 
in the referenced array. 


ee, 
DIM A(10,20), B10) 


DIM B$(2,5,10),C(I + 7.3,/N),D(I) 


DIM X(ACT)-M,N) 


PROGRAMMING NOTE: 


A <DIM statement> 


iS an executable statement, 
execution wil] 


and each 
allocate anew array. 


16 





ELEMENTS 


3 | 


END 
END statement 


SYNOPSIS: 
bid _ 
=¢¢ [line number] END 
éc™. 
a?,z 
7,48 
398 DESCRIPTION: 
428 ; 
333 An END statement indicates 
eS gram. It 
> 


the end of the source pro- 
is optional ands if present, it terminates 
readina of the source program. 


If any statments'7 fole 
low the END statement they are ignored. 


EXAMPLES: 


10 END 


END 
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ELEMENTS: 


EXP 


EXP ( <expression> ) 


DESCRIPTION: 


Th 

2 ee returns e (2.71828.eee)} faised 

ee ve <exoression>. The arqument m es 
oating point number. : fot uate 


If the value 

of the <expre ' 

127th 2Ssion> exceeds t 
Power, a floating point overflow oes os 


EXAMPLES: 
EXP(X) 


EXP(LOG(X)) 





<expression> 
ELEMENTS 


<expressian> 


DESCRIPIION: 

8 ° . . . 
Bee Expressions consist of algebraic combinations of vari-= 
2) 5 ables, constants, and operators. The hierarchy of 
7,85 operators 1S: 

393 1) & 

453 e) y 

33% 3) a, / 

$c 4) t+, *, concat (+), unary +, 
> 


unary = 
>) relational ops <»s <=r >, >=, Sy <> 


LT, Gh, Ge Ges EG, NE 


6) NOT 
i] AND 
8) OR, XOR 


Relational ooerators result tin aOQOif false and =] +7 


true. NOT, AND, and OR are performed on 32 bit two's 
complement binary representation of the integer pore 
tion of the variable. The result is then converted to 
a floating point number. 


String variables may be 
operated on by relational operators and concatenation 


only. Mixed string and numeric operations are not per= 
mitted. 


EXAMPLES: 
xX +: ¥ 


AS + BS 


(A°<2.8) OF ECS. > DSI): 7- (A = B AND..O) 
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ELEMENT: 


FILE statement 


SYNOPSIS: 
2 (<line number>) FILE <variable> [(<expression>)] 
Soe {, <variable>[(<expression>)] } 
e-™. < 
298 DESCRIPTION: 
>o : 
$58 
333 A file statement onoens files used by the program. The 
eS order of the mames determines the numbers used to 
> 


reference the files in READ and PRINT statements. 
value assiaqned to the first simple variable is filel, 
the second is file 2, and so forth. There may be any 
number of FILE statements in a program, but there is a 
limit to the number of files which may be opened at 
one time. Currently this limit 1s set at 6 files. 

The optional <expression> designates the logical 
record lenqth of the file. If no length is specified, 
the file is written as a continuous string of fields 
with carriage return linefeed characters separating 
each record. If the record lenath is present, a care 
riage return linefeed will be appended to each record. 


The <variable> must not be suboscripted and it must tbe 
of type string. 


The 


EXAMPLES: 
FILE INPUTS, OUTPUTS 


FILE TABLE.ENCS, TAX.INCS(160), PAY.AMT.DAYS(N*3=J) 


PROGRAMMING NOTE: 


The run-time monitor will always assign the lowest 
available (not previously assianed) number to the file 
being opened. Thus if files are closed and others 


opened it is possiodle that number assignment may vary 
with program flow. 


20 





FOR 
ELEMENT: 


FOR statement 


SYNOPSIS3 
29% [<line number>] FOR <index> = <expression> TO 
a, <expression> [STEP <expression>] 
438 DESCRIPTION: 
D i 
2 Execution of all statements between the FOR statement 
> and its corresponding NEXT statement is repeated until 
the indexing variable, which is incremented by the 
STEP <exopression> after each iteration, reaches the 
exit criteria. If the step is positives, the loop exit 
criteria 1S that the index exceeds the value of the TQ 
<expression>. If the step is negativer the index must 
be less than the TO <expression> for the exit criteria 
to be met. 
The <index> must be an unsubscripted variable and is 
initially set to the value of the first <expression?>, 
Both the TO and STEP expressions are evaluated on each 
er loop, and all 


variables associated with the FOR state= 
ment may change within the loop. If the STEP 


is omitted, a default value of i 
loop is always executed sat 
may be used to loop 


clause 
1s assumed. A FOR 
least once. A step of Q 
indefinitely. 


EXAMPLES: 
FOR I = 1-70 10 STEP 3 
FOR INDEX = J*K*-L TO 10*SIN(X) 
FOR I = 1 T0 2 STEP 0 
PROGRAMMING NOTE: 


If a step of 1 is desired the step 
omitted. The execution will 
since 


clause should be 


be substantially faster 
less runtime checks must be made. 


el 





ELEMENT: 


FRE 
FRE predefined function 
SYNOPSIS: 

e FRE 
POS 
Fuel 
2'35 
‘ase DESCRIPTION: 
198 ; 
re The FRE function returns the number of bytes of unused 
23 space in the free storage area. 
3 

EXAMPLE: 
FRE 


ce 
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FUNCTIONS 
<function name> 
SYNOPSIS: 


FN<identifier> 


DESCRIPTION: 


<function name> 


Any <identifier> starting with FN refers to a 
defined function. 


user= 
The <function name> must appear 
DEF statement prior to being used 


in a 
in an <expression>. 
There may not be any spaces between the FN and the 
<identifier>. 
EXAMPLES: 
FNA 
FN.BIGGER.S 


23 
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ELEMENT: 


GOSUB 


GOSUB statement 


SYNOPSIS: 


[<line number>] 
{<line number>] 


GOSUB <line number> 
GO SUB <line number> 


DESCRIPTION: 
The address of the next sequential instruction is 
Saved on the runtime Stack, and control is 
transferred to the Subroutine labeled with the <line 
number> following the GOSUB or GO SUB. 


EXAMPLES: 
10 GOSUB 300 
GO SUB 100 
PROGRAMMING NOTES: 


The max depth of 


the size of the 
Be i234 


GOSUB calls allowed is controlled by 
run-time stack which is currently set 


24 
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GOTO 
ELEMENT: 
GOTO statement 
SYNOPSIS: 


{[<line number>] GOTO <line number> 
[<line number>] GO TO <line number> 


DESCRIPTION: 


Execution continues at the statement labeled with 
<line number> following the GOTO or GO TO, 


the 
EXAMPLES: 


100 GOTO 50 


GO TO 190 





<identifier> 
ELEMENTS 


<identifier> 





SYNOPSIS: 
e 
=ge <letter> { <letter> or <number> or .} ({ $ ) 
or. 
98 DESCRIPTION: 
Te 
as° An identifier begins with an alphabetic character fol- 
S lowed by any number 
> 


of alphanumeric characters, 
periods. Only the first 31 characters are considered 
unique. I f 


the last character is a dollar sign the 
associated variable is of type strings otherwise it 
of type floating point. 


or 


1s 

EXAMPLES: 
A 
RS 


XYZ.ABC 


PAY .RECORD.FILE.NUMBER.76 


PROGRAMMING NOTE? 


All lowercase letters apnearing in an <identifier> are 
converted to uppercase unless’ compiler toggle D is set 
toe:ott. 





ELEMENT: 


LF 

ew IF statement 

SYNUPSIS: 
2e3 {[<line number>] IF <expression> THEN <line number> 
éc™. 
7,28 (<line number>] IF <exoression> THEN <statement list> 
ez 
207 
232 [<line number>] IF <expression> THEN <statement list> 
333 ELSE <statement list> 
$c 
> 


DESCRIPTION: 


If the value of the <expression> is not 0 the state=- 
ments which make up the <statement list> are executed, 


Otherwise the <statement list> following the ELSE is 


executed, if oresent, or the next seauential statement 
is executed. 


In the first form of the statement 
is not equal te “Ws 


label occurSe 


EXAMPLES: 


if the <expression> 
an unconditional oranch to the 


IF AS < BS THEN X= YZ 
IF (A$<BS) AND (C OR 0) THEN 390 
IF B THEN X = 3.0 : GOTO 200 


Ir J AND K FHEN GOTO 11 -ELSE GOTO ie 


ef 
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ELEMENTS 


SYNOPSIS: 


DESCRIPTION: 


If END 
if END statement 


[<line nmumber>] LF. 


, END 
numoer> 


R<expression> THEN <line 


If during a read to the file 


specified by th 

ae e <expres= 
og Aa end of file is detected Scat ‘a 
| e to the statement labeled with th i 
number following the THEN. 9 (eae 


EXAMPLES: 


IF END # 1 FHEN 100 


10 IF END 4 FILE SNUMBER © INDEX THEN 706 


PROGRAMMING NOTE: 


On transfer to the 


line number fol] 

saan Owing the THEN 

= Be ii to the state. prior to the ae tie 
1e- statement which caused the i 

Soncition. — Sy 


c8 
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FLEMENTS: 


INP 
INP predefined function 
SYNOPSIS: 
INP ( <expression> ) 
DESCRIPTION: 


The INP function performs an 
8080 


input 
machine port 


operation onthe 
reoresented 


Dy the value of the 
<expression> modulo 256 returning the resulting value. 
The argument must evaluate to a floating point number. 


EXAMPLES: 
TNP (2) 


INP (CURRENT. INPUT.PORT) 


c9 





INPUT 
ELEMENT: 


INPUT statement 


SYNOPSIS: 


7 ues 
L161 @ 


oupu 
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[<line number>] INPUT [<promot strina> ;] 


<variable> {, <variable> } 


_e 


1 6y46U IV 


i 


DESCRIPTION: 


@p|MPLOM ‘Pease 


wsny 


The <prompt string>, if oresent, 18 printed on the 
console. A line of inout data is read from the con=- 
sole and assigned to the variables as they appear in 
the variable list. The data items are separated by 
commas and/or blanks and terminated by a carriage 
return. Strings may he enclosed in quotation marks. 
If a string is not enclosed by quotes, the first comma 
terminates the string. If more data is requested than 


was entered, or if insufficient data items is entered, 
a warning 31S printed 


on the console anda the entire 
line must be reentered. 


EXAMPLES: 
10 INPUT A,B 


INPUT “"SiZ6 OF ARRAYS"? N 


INPUT. "VALUEST™2 ACIJ3BCI)+CCACT2) 


PROGRAMMING NOTE: 


Trailing blanks 
One blank 


in the <prompt string> are ignored. 
is always sunpolied by the system. 


30 





ELEMENT: 


4 : 


INT 
INT predefined function 
SYNOPSIS: 
29% INT (€ <expression> ) 
oo : 
7,28 : 
393 DESCRIPTION: 
#3 : 
a3 The INT function returns the 
S or equa) 
> 


largest integer less than 
to the value of the <expression>. 


The argu- 
ment must evaluate to a floating point number. 


EXAMPLES: 


INT CAMOUNT 7 100) 


INT(CS * X * SINCY)) 


a4 
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ELEMENT: 


LEFTS predefined function 


SYNOPSIS: 


LEFTS (€ <expression> , <expression> ) 


DESCRIPTION: 


The LEFTS function returns the n 


of the first <expression?>, 


secur s +t n 


error 

is negative. I[f n ts greater than the 

length of the first <expression> then entire 

expression is returned. The first must 

evaluate to a string and the second floating 
point number. | 


EXAMPLES: 


LEFTS (AS,3) 


LEFFS(CS+05,1J) 


Se 


leftmost characters 


where n to the 


integer portion of the second <expression>. 


cor4s 





LEN 
: ELEMENT: 
wr LEN predefined function 
SYNOPSIS: 
2eg LEN (€ <expression> ) 
éc™. : 
2"35 
7a : 
$55 DESCRIPTION: 
&>O ~ 
*2=Q 
333 The LEN function returns the length of the string 
ec <expression> passed as an argument. Zero iS returned 
> if the argument is the null string. 
EXAMPLES: 
LEN(AS) 
LEN(CS + BS) 
LEN(LASTINAMES + “," + FIRSTNAMES) 
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ELEMENT: 


Let 


LET statement 


SYNOPSIS: 


[<line number>] [LET] <variable> = <expression> 


DESCRIPTION: 


The <exoression> is evaluated and 
<variable> 


assigned to the 


appearing on the left side of the equal 
signe The type of the <expression>, either floating 
point or strings must match the tyoe of the <varie= 
able>. 

EXAMPLES: 


60 LET A = 6 ee 


NGS, 8) (3 7. et Xe; 3) 


73 W = (A<B) 


AMOUNTS = DOLLARSS + “." + CENTS$ 


OR (C$>D3) 


34 





<line nmumber> 
ELEMENT $ 


'€]line number> 


SYNOPSIS: 
2e% <digit> { <digit> } 
orc. 
=" 
ae DESCRIPTION: 
2 > 
s2=9 ~ 
333 <line numbers> are optional on all statements and are 
ec ignored by the compiler except when they appear in a 
> GOTO, GOSUB, or ON statement. In these cases, the 
<line number> must appear as the label of one and only 
one <statement> in the program. 3 
<line numbers> may contain any number of digits but 
only the first 31 are considered sianificant by the 
compiler. 
EXAMPLES: 
1090 
‘eS 4635276353 


35 





ELEMENTS: 


LOG predefined function 





SYNOPSTS: 
e 
=ge LOG ( <expression> ) 
eg = 
308 DESCRIPTION: 
283 oe 
52% The LOG function returns the natural 
3S 
> 


logarithm of 
absolute value of the <expression>. 


} the 
The argument must 
evaluate to a non-zero floating point number. 
EXAMPLES: 
LOG (xX) 


LUG( CA + B)/D) 


LOG10 = LOG(X)/LOG(10) 


$6 





MIDS 
& FLEMENTS: 


MIDS oredefined function 


SYSNOPSIS: 


797] UBS 


MIDS ( <exoression> » <exoression> 


~ay $}U61 IV 


@PIMPLJOM ‘PeAser~ 


"y'S'N1 Ul PPR “WO ‘OPUS 


, “sexpression> ) 


DESCRIPTION: 


guOo ‘Daw ivi . 464 ® 


The MIDS function returns a string consisting of the n 
characters of the first <expression> starting at the 
mth character. The value of m is equal to the integer 
portion of the second <expression> while n is the 
integer portion of the third <expression>. 

The first argument must evaluate to a strings and the 
second and third arguments must be floating point 
numbers. If m is greater than the lenath of the first 
<expression> a null string iS returned. +  H-38 
Greater than the number of characters left in the 


strinq all the characters from the mth character are 
returned. 


An error occurs if m or n is negative. 


EXAMPLES: 


MIDS(AS,1,J) 


MI0$(B8$+CS$,START,LENGTH) 








NEXT 
ELEMENT 


NEXT statement 


SYNOPSIS: 

293 [<line number>] NEXT [<identifier> (,<identifier>}] 
a5 

soz DESCRIPTION: 

SO ; 

438 

32% A NEXT statement denotes the end of the closest 
oie unmatched FOR statement. 

: 


If the optional <identifier> 
3S present it must match the index variable of the FOR 
statement being terminated. The list of <identifiers> 
allows matching multiple FOR statements. The 
number> of a NEXT statement may appear in an ON or 
GOTO statements, in which case execution of the FOR 
loop continues with the Jlooo variables assuming their 
current values. | 


<line 


EXAMPLES: 
LG NEAT 
NEXT I 


NEXT Is Je K 


38 
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ELEMENT: 


ON statement 


SYNUPSIS: 


(1) [<line number>] 
(2) (<line number>] 
(3) [<line number>] 
(4) (<line number>] 


DESCRIPTION: 


The <expression?, 
value, is used 


ates to 

forth. 

address of the next 
address. 

An error occurs 


less than one oor 


numbers> in the liste 


EXAMPLES: 


10 ON [I GOTO 10, 20, 


rounded to the 


to select the <line number> at which 
execution will continue. 


1 the first <line number> 
In the case of an ON ... GOSUB 


ON <expression> GOTO 


<line nmumber> {, <line number>} 


ON <exopression> GO TO 
<line number> {, <line number>} 


ON <expression> GOSUB 
<line numbper> {, <line number>} 


ON <expression> GQ SUB 


<line number> {+f <line number>} 


nearest 


If the <expression> 


instruction becomes the return 


if the <expression> after rounding 


Qreater than the number of <line 


30, 40 


ON J*K=-M GO SUB 10, 1s le 10 


39 





integer 


evalu-= 
is selected and sO. 
Statement the 


ELEMENTS 


QUT 


OUT statement 


SYNOPSIS: 

@ 
238 {[<line number>] OUT <expression> », <expression> 
the 
7,38 
338 DESCRIPIION: 
238 | 
323 The lowworder eight bits of the 
3S 

> 


integer portion of the 
second <expression> is sent to the 8080 machine output 
port selected by the 


integer portion 
exoression 


OF: {he first 
modulo 256. Both arguments must evaluate 
to floating point numbers. 


EXAMPLES: 
100 OUT 3,190 


40 








97) UBS 
LL6\ @ 


» sy6U Ii 


on 
> ‘oupue 
‘OJIN IWS . 


MplIOM ‘pense 
ul pe "VO ' 
ddOO ‘9 


ep! 


vsn 


ELEMENTS 


POS 
POS predefined function 


SYNOPSIS: 


POS 


DESCRIPTION: 


The POS functi 

1on returns the 

output li current positi 

from 1 oe buffer pointer. This kat ee 
to the print buffer size ue will range 

EXAMPLES: 


PRINT TAB(POS + 3)7X 


4} 





: | 3 PRINT 
ELEMENT: 


PRINT statement 


SYNOPSIS: 

2g KANDomM— (1) [<line number>] PRINT #<expression>,<expression>; 
és. <expression> {+ <expression> } 
7,28 S | 
Sz SEQUENTIAL- (2) [<line number>] PRINT #& <expression> ; 
age <expression> {, <expression> } 
a 

$e (3) ([<line number>] PRINT <expression> <delim> 

> 


{ <expression> <delim> } 


DESCRIPTION: 


A PRINT statement sends the value of the expressions 
in the expression list to either a disk’ file (type(1) 
and (2)) or the console (type (3)). A type (1) PRINT 
Statement sends a random record specified by the 
second <expression> to the disk file specified by the 
first <expression?>. An error occurs if there is 
insufficient smace in the record for all values. 
A type (2) PRINT statement outouts the next sequential 
record to the file specified by the <expression> fole 
lowing the 4. | 

A type (3) PRINT statement outputs the value of 
<expression> to the console. A space is appended to 
all numeric values and if the numeric item exceeds the 
right margin then the print buffer 1s dumoed before 
the item is printed... The <delim> between the <expres-. 
sions> may he either a ‘comma or a semicolon. The 
comma causes automatic spacing to the next tab posi- 
tion. (14,2642 ,56). Lt. the current srint cesition +s 
greater than 56 then the print buffer is printed = and 
the print position is set to zero. A semicolon indi= 
cates no spacing between the printed values. If the 
last <expression> is not followed by a <delim> the 
print buffer is dumped and the print position. set 
equal to zero. The buffer 1s automatically printed 
anytime the print position exceeds 71. 


each 


EXAMPLES: 
100 PRINT #413A,B,AS+"x" 
PRINT #4 FILE,WHERE; A/B,D, "END". 


PRINT A, By, “THE ANSWER IS"; x 


4e 
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ELEMENTS 


RANDOMIZE statement 


SYNOPSIS: 


[<line number>] RANDOMIZE 


DESCRIPTION: 


A RANDOMIZE statement initializes the 
generator. | 


EXAMPLES: 


10 RANDOMIZE 


RANDOMIZE 


43 


random 


RANDOMIZE 


number 








READ 
ELEMENT: | 


READ statement 


SYNOPSIS: 
29% C1) (€<line number>] READ <expression>, <expression>; 
aA: <variable> {, <variable> } 
$53 RANDOM ~ (2) [<line number>] READ # <expression>; 
252 <variable> {, <variable> } 
835 
25° 
So SEQUENTIAL~ (3) [<line mumber>] READ # <variable> {, <variable> } 
> 
DESCRIPTIONS: 


A READ statement assigns values to variables in the 
variable list from either a file (type (2) and (3)) or 
from a DATA statement (type (1)). Type (2) reads a 
random record specified by the second expression from 
the disk file specified by the first expression 
assigns the fields in the record to the variables in 
the variable list. Fields may be floating point or 
string constants and are delimited by a blank or 
comma. Strings may optionally be enclosed in quotes. 


An error occurs cf there are more variables than 
fields in the record. 


and 


The type (3) READ statement reads the next sequential 
record from the file specified by the expression and 


assigns the fields to variables as described above. 


A type (2) READ statement assigns values from DATA 
Statements to the variables in the list. DATA state= 
ments are processed sequentially as they appear in the 


program. An attempt to read cast the end af the last 
data statement produces an error. 


EXAMPLES: 


100 READ A,B,CS 


200 READ #4 1,13 PAY.REG,PAY.OT,-HOURS.REG,HOURS.OT 


READ # FILE.NO? NAMES$,ADDRESSS,PHONES, ZIP 


4a 





ELEMENT: 





REM 
REM statement 


SYNUPSIS3: 
@ 
2ge [<line number>] REM [<remark>] 
ac. : 
z°,z 
7,28 [<line number>] REMARK [(<remark>] 
a? 
aS 
£33 
as° DESCRIPTION: 
3 , 
wo 
=. A REM statement 1s iqnored by the compiler and compi- 
lation continues with the statement following the next 
carriage return. The REM statement may be used to 
document a program. REM statements do not affect the 
size of program that may be compiled or executed. An 
unlabeled REM statement may follow any statement on 
the same line. And the <line number> may occur in a 
GOTO, GOSUB or ON statement. 
‘Se EXAMPLES: 


10 REM THIS IS A REMARK 


REMARK THIS IS ALSO A REMARK 
Ley 2 


0 REM INITIAL VALUE OF 





~ay S}U8U IV 
7a] URS 


@PIMPLOM ‘PeAled~ 


“wef Ul ePRIW ‘WO ‘OUPUe 
“ws'n poset ‘ow isn. 4464 ® 





ELEMENT: 


reserved word list 


SYNOPSIS: 


<letter> { <letter> } [( § ] 


DESCRIPTION: 


The following words are reserved by 
not be used as <identifiers>: 


ABS AND ASC 
CLOSE cos COSH 
DIM Ei. Se END 
FILE FOR 3 FRE 
GOSUB GOTO GT 
INPUT INT Le 

LET LOG LT 
NEXT NOT ON 

Pos | PRINT RANDOMIZE 
RESTORE _ RETURN RIGHTS. 
SIN | SINH SGR 
STRS SUB TAB 

TU 3 VAL 


Reserved words must be preceeded 


either a special character or a space. 


be embedded within reserved words. 


reserved word list 


BASIC=E 


ATN 
DATA 
EQ 
GE 
iF 
LEFTS 
MIDS 
OR 
READ 
RND 
STEP 


TAN 


and 


Unless 


and may 


CHRS 
DEF 
EXP 
GO | 
INP 
LEN 
NE 
OUT 
REM 
SGN 
STOP 


THEN 


followed by 
Spaces may not 
compiler 


toagle 0D is set, lowercase letters are converted to 
uppercase prior to checking to see if an 


is a reserved word. 


46 
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ELEMENT: 


RESTORE 
RESTORE statement 


SYNOPSIS: 
2e% [<line number>] RESTORE 
ae~. 
48 
7,33 | 
SOR DESCRIPTIONS 
$ >@) 
sz 
He A RESTORE statement renpositions the pointer 
fe. data area so that the 
> 


mnNto the 
next value read with a READ 
be the first ttem in: the first  OATA 
effect of a RESTORE statement is to 
allow rereading the DATA statements. : 


statement wil] 
statement. The 
EXAMPLES: 


RESTORE 


10 RESTORE 
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ELEMENTS: 


RETURN 
RETURN statement 


SYNOPSIS: 


[<line number>] RETURN 


DESCRIPTION: 


Control is returned from a subroutine to the calling 
routine. The return address is maintained on the top 
of the run-time monitor stack. 


No check 1§$ made to 
insure that’ the RETURN follows a GOSUB statement. 


EXAMPLES: 


130 RETURN 


RETURN 


48 
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RIGHTS 
ELEMENT: 
RIGHTS oredefined function 


SYNOPSIS: 


RIGHTS ( <expression> » <expression> ) 


DESCRIPTION: 


The RIGHTS function returns the n riaqhtmost characters 
of the first <exorssion>. 


The value of n is equal to 
the integer pvortion of the second <expression>. If on 
is negative an error occurs? if n iS greater than the 
length of the first <expression> 
<expression> 


then the entire 
is returned. The 


first argument must 
produce a string and the second must produce a float= 
ing point number. 


EXAMPLES: 


RIGHTS(X3,1) 


RIGHTS(NAMES,LNG.LAST) 


49 





ELEMENT: 


RNOD 


RND predefined function 


SYNOPSIS: 
Zee RND 
7,8 
$08 DESCRIPTION: 
Ps 
s=9 
333 The RND function generates 
2 
a 
> 


a uniformly 


random number between 0 and il. 


distributed 
EXAMPLE: 


RND 


50 





ELEMENTS 


SGN 


SGN predefined function 


SYNOPSIS: 
co) ‘ 
2e¢ SGN ( <exoression> ) 
20% DESCRIPTION: 
232 
a The SGN 


function returns 1 is 
<expression> 


the value of the 
is greater than QO, =1 
less than 0 and 


‘ysn ul 


if the value is 
0 if the value of the <expression> is 
a> The argument must evaluate to a floating point 
Number. 
EXAMPLES: 
SGN(X) 


SGN(A = B + C) 











ELEMENTs 


SIN 


SIN predefined function 


SYNOPSIS: 
| 
286 SIN (€ <expression> ) 
> € ae 
2'33 
‘332 
208 DESCRIPTION: 
358 
323 SIN is a predefined function which 
3S the <expression>. 
> 


returns the sine of 


The argument must evaluate to a 


floating point number in radians. 


A floating point overflow occurs if the absolute value 
of the <expression> is greater than two raised to the 
C4th power times Die 


EXAMPLES: 


Xx = SINCY) 


SINCA = B/C) 
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ELEMENTS: 


SINH 
SINH predefined function 


SYNOPSIS: 
Zee SINH ( <expression> ) 
ace DESCRIPTION: 
3 >@ - 
233 
32% SINH is a function which returns the 
os of the 
> 


<exoression>. 


hyperbolic 
floating point number. 


sine 
The argument must evaluate to a 


EXAMPLES: 


SINHCY) 


SINH(B<C) 
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ELEMENT: 


soecial characters 


special characters 


DESCRIPIION: 


The followina special characters are used by BASIC@-E: 


Tt circumflex 

( open parenthesis 

) closed parenthesis 
x asterisk 

+ olus 

- minus 

/ slant 

: colon 


semicolon 


= 


as less=than 

> greater-than 

= equal 
nNumber=sign 

, comma 

CR carriage return 
\ backslant 


Any special character in the ASCII character set may 
appear in ae strina. Special characters other than 
those listed above, if they appoear outside a string, 
will generate an IC error. 


54 
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| <statement> 
w ELEMENT: 





<statment> 


~ay sjuBU IV 


SYNOPSIS: 
g3 { <line number> J] <statement list> <cr> 
i { <line number> ] IF statement <cr> : 
i { <line number> ] DIM statement <cr> 
iS {[ <line number> ] DEF statement <cr> 


{ <line number> ] END statement <cr> 


DESCRIPTION: 


All BASIC#©E statments are 


terminated by a 
return ( <er> ). 


carriage 
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ELEMENT: 


<statment 


SYNOPSIS: 


<statement list> 


listo 


<simple statement> {2 <simple statement> } 


where 


a <simple statement> is one of the following: 


FOR statement 
NEXT statement 
FILE statement 


CLOSE statement 
GOSUB statement 
GOTO statment 
INPUT statement 
LET statement 

ON statement 
PRINT statement 
READ statement 
RESTORE statement 
RETURN statement 
RANDOMIZE statement 
OUT statement 
STOP statement 
<emoty> statement 


DESCRIPTION: 


A <statement list> allows more than one <statement> to 
occur on a single line.- 


EXAMPLESS 


es ee 


Leb Soe Ge KS 
X = ¥+Z/W 3 RETURN 


eces? PRINE "THIS -FS OK: FUO* 
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STRS 
ELEMENT: 
STRS$ predefined function 
SYNOPSIS: 
STRS ( <expression> ) 
DESCRIPTION: 
The STRS function returns the ASCII string which 
represents the value of the <expression>. The argument 
must evaluate to a floating point number. 
EXAMPLES: 
STRS(X) 


STR$(3.141617) 


a 
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“subscript list> 
ELEMENTS 


<subscript listo 


SYNOPSIS: 


<expression> {, <expression> } 


DESCRIPTION: 


A <subscriont list> may be 


used .as -paert of -a <DIM 
statemento to 


specify the number of dimensions and 
extent of each dimension of the array being declared 
or as part of a <subscripted variable> to indicate 
which element of an array is being referenced, 


There may be any 
evaluate to a 

list> as part of 
reference to the 


number of expressions but each must 
floating point number. A <subscript 
a DIM statement may not contain a 
array being dimensioned. 


EXAMPLES: 
4€10,20,20) 


YSCi,J) 


COSTCAMT(1I),PRICE(I)) 
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SQR 
‘eS ELEMENT: 
SQR ( <expression> ) 
DESCRIPTION: 
e 
238 SGR returns the square root of the absolute value of 
3? = the <expression>. The argument must evaluate to a 
7,42 floating point number. 
Sz 
aca | 
s=9 
683 
32% EXAMPLES: 
$5 
= SQR (Y) 


SGR(Xte + YT2) 








FLEMENT: 


TAB 
TAB predefined function 
SYNOPSIS: 

@ 
28s TAB ( <expression> ) 
20% DESCRIPTION: 
253 
s23 The TAB function positions the output buffer 
Co to 

> 


pointer 
the position specified by the integer value of the 
<exoression> rounded to the nearest integer modulo 73. 
If the value of the rounded expression is less than or 
equal to the current print positions, the print buffer 
is dumped and the buffer pointer is set as describved 
aoove. 


The TAB function may occur only in PRINT statements. 


EXAMPLES: 
TAB(10) 
TABCTI * |) 
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ELEMENTS: 


STOP 
STOP statement 


SYNOPSIS: 

@ 
223 {[<line number>]} STOP 
a: . 
‘482 ; 
O8 DESCRIPTION: 
32% Upon encountering a <STOP statement> program execution 
5 terminates and all open files are closed. The print 
ee: buffer 1s emptied and control 

tem. Any nmumber 


returns to the host sys 
of STOP statements may appear in a 

OrPOgram. 

A SIOP statement is appended to all 

compiler. 


programs by the 


EXAMPLES: 


‘eS i: St0P 


STOP 








ELEMENT: 





TAN 
TAN predefined function 
SYNOPSISS$ 
292 TAN (€ <exoression> ) 
7,88 
20% DESCRIPTION: 
483 | 
383 TAN is a function which returns the tangent of the 
ec expression. The argument must be 
> 


in radians. 


An error occurs if the <exopression> is a multiple of 
pi/2 radians. 


EXAMPLES: 


10 TAN(A) 


TAN(X = 3*COS(Y)) 








VAL 
Ss ELEMENTS 
VAL predefined function 
SYNOPSIS: 

e 
2gs VAL ( <expression> ) 
‘Be : 
398 DESCRIPTION: 
BO 
333 The VAL function converts the number in ASCII passed 
3S as a parameter into ae floating point numoer. The 
gf <expression> must evaluate to a string. 


Conversion continues until a character is encountered 
that is not part of a valid number or until the end of 
the string 18 encountered. 


EXAMPLES: 


VAL(AS) 


‘VAL("3.789" + "E=07" + "THIS IS IGNORED") 
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ELEMENTS 


<variable> 
<variable> 


SYNOPSIS: 


a ae 
identifier> (( <subscript list> )]) 


DESCRIPTION: 


A <variable> i 

in BASIC#E ma ; 

. ee ics or a string depending on a tlgat- 
jer>. Subscrioted Variob le e type of 


EXAMPLES: | 
x 


Y$(€3,190) 


ABS sAMLOX€1T),Y¥ Ci StU Tet) ) 
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IIIT. OPERATING INSTRUCTIONS FOR BASIC=E 


The BASIC#E programs are written to operate with the 


CP/M Floppy Disk Operating System (4). Operation with a 


different system will require modification to the 


input/output routines in the compiler and run-time monitor. 


Execution of a program using BASIC=E consists of three 


steps. First the source program must be created on disk. 
Next the program 1s compiled by executing the BASIC*E come 
piler with the name of the source program provided as a 
parameter. Finally che Kiera iciare CINT) file created by 


the compiler may be interpreted by executina the run-time 


monitores again using the the source program name as a parame 


eter. 


Creation of the source program will normally be accom- 
plished using CP/M's text editor, and must have a file type 
BAS. The BASIC#E statements are free form with the restrice 


tion that when a statement 1s not completed on a single 


lines, a continuation character (\) must be the last charace 


ter on the line. Spaces may precede statements and any 
number of spaces may appear wherever one space is permitted. 
Line numbers need only be used on statements to which cone 


trol is passed. The line numbers do not have to be mn 


ascending order. Using identifiers longer than two charac= 


ters and indenting statements to enhance readability 


does 
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not affect the size of the object file created by the com- 


oh ler. 


The first statement of a source orogram may be used to 
specify certain compiler options. If present, this state= 
ment must begin with a dollar sign (3) tin column one and 0obe 
followed by the letter or letters indicating the options 
which are desired. The letters may be separated by any 
number of blanks. Invalid letters or characters are 
ignored. Appendix D lists valid compiler optionss and their 
inttial settings. Toggle A is used for compiler debuqging. 
Toggle B supresses listing of the source program except’ for 
Statements with errors. Toggle C compiles the program but 
does not create a INT file. Normally the BASIC*E compiler 
converts all letters apnearing in identifiers or pee eve 
words to uppercase. If toggle Dis set this conversion is 
not performed. Letters anoppearing in strings are never con= 
verted to uppercase. Toggle E causes code to be generated 
by the eenai ies SO teats wees desecs tun at a run-time error, 
the source statement line which was being executed at the 
time the error occured is listed along with the error mes= 


SAGeCe 


The BASIC=#E compiler is invoked as follows: 
BASIC <program name> 
The compiler begins execution by opening the source file 
specified as a parameter and comoiles each BASIC“E statement 
producing an object file in the BASIC-E machine language 


with the same name as the source program but of type “INT”. 
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The source program may be listed on the output device with 


any error messages following each line of the program. 
Appendix A lists the compiler error messages. Errors SO, TQ 
and VQ indicate storage used by the compiler has been 


exceeded. These errors require recompilation of the BASIC=E 
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compiler with more space allocated to the poarticular vector 


involved. Figures 1 and 2 show sample program listings. If 


no errors occur during compilations the object file may be 
executed oy the run time monitor by typing the command: 


RUN <program name> 


The runstime monitor consists of two programs. The 

first program initializes the floating point package and 
re then reads the intermediate language file specified as a 
garameter. As the INT file is read, the floating point con 
stants, BASIC-E machine sadie and the data area are built. 
At this time branch addresses and references to floating 
point constants and the program reference table (PRT) are 
pelouares to reflect actual machine addresses. Control 1s 
then passed to the interpreter for execution of the BASIC$E 
machine language. The orogram which builds the machine 
resides in the free storage area and is overwritten as space 
is allocated by the interpreter. Appendix B lists run-time 


error messages. Figure 3 outlines the structure of the 


BASIC#E machine. 


The BASIC"“E machine is divided into a static and vary= 
- ing area. The static section consists of the BASIC@$E Run 
Time Monitor, constantS, machine code and data statements. 
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REMARK ~PROGRAM [TO COMPUTE THE FIRSTN 
REMARK FIBONACCI NUMBERS 


PRINT “THIS PROGRAM COMPILIES LHE-FIeGt A 
PRINT “FIBONACCI NUMBERS" 


PRINT "AN INPUT OF O TERMINATES THE PROGRAM" 
Poe 1. = t lO 1-S1ER 0 


7a] UBS 
L161 @ 


REMARK DO THIS FOREVER 


a; sjuBU LIV 


| INPUT "ENTER THE VALUE OF N"3 N 
35 IF N = 0 THEN \ 
42 PRINT "PROGRAM TERMINATES" 3\ 
are STOP 
839 IF N < 0 THEN \ 
23 PRINT "N MUST BE POSITIVE. "3 3:\ 
> 


MRINT “PLE SSE MEENTER” \ 
Ripe 


GOSUB 300 REMARK CALCULATE 


AND PRINT RESULTS 
NEM: I 
300 REMARK SUBROUTINE TO CALCULATE FIB NUMBERS 
ee Pe ae REMARK INITIAL VALUES 
NUM = Fl 


REMARK HANDLE FIRST TwO NUMBERS CIF REQ) AS 
REMARK SPECIAL CASES 
PUN oS ob th oe 
GOSUB 400 
LP ROS. THEN SY 
RETURN 
NEXT J 


REMARK HANDLE REMAINING NUMBERS 


> f0R J 24 1A Stee o 
NUM = Fl + Fe 


GOSUB 400 
Pe Shy 
Fi s NUM 
if NOS TREN 
RETURN 
NEXT J 
RETURN 
400 REMARK PRINT NEXT NUMBER AND 


REMARK DECREMENT N 
PRINT NUM, REMARK 5 TO A LINE 
N=Ne 1] 
RETURN 
END 


PFyaqure 1 
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REMARK PROGRAM BUILDS A FILE OF MAILING LABELS 
REMARK FROM A FILE CONTAINING 100 BYTE RECORDS 
REMARK 


WHICH CONTAIN NAME AND ADDRESS INFORMATION 


INPUT “NAME OF SOURCE FILE"; SOURCE.FILES 


ep! AADI JOM ‘peAiase 
dud “D3W IVvSIN' . 


“y'S'fN Ul OpeW 


INPUT “NAME OF LABEL FILE"*-LABLE.FILES 
IF END # } THEN TO00 


FILE SOURCE.FILES(100), 


LABLE.FILE 





REMARK LABLE.FILE [S NOT BLOCKED 


FOR INDEX = 1 TO 1 STEP 0 


REM UNTIL END OF FILE 
READ # 1 


FIRSTS, LASTS, STREETSs CITYS, STATES,ZIP 


REMARK LINES ARE TRUNCATED AT 60 CHARACTERS 


LINE1$ 


LEP ISiPinsils. + * “+. CASI S7 60) 
LINES 


LEFTS(STREETS,60) 


REMARK INSURE ZIP NOT TRUNCATED 


LINE3S = LEFTS(CITYS + ", " + STATES,S4) 


LINE3S t TNE SS o. ™ + SIRS Cle) 
PRINT # 23 LINE1$ 
PRINT # 23 LINE2S 
PRINT # 23 LINE3S 
NEXT INDEX 
100 -°- PRINT "JOB COMPLETE" 


STOP 
END 


Fiaure e 
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FSA 
(Free Storage Area) 


VARYING 


PRT 
(Program Reference Table) 


STATIC 


FDA 
(Floating Point Data Area) 


Figure 3 


Structure of the NBASIC Machine 
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The varying areas which includes all the remaining memory, 
stores program variables, the stack and the free  storaae 
area. fhe stack is a circular queue and therefore it is not 
possible to overflow the stack. Wowever, if the stack wraps 
around onto itself the results could be meaningless. The 
size of the stack is initially set at !2 but may be changed 
by recompiling the interpreter. The free storage area is 


used to dynamically allocate arrays and strings. Storage is 


freed as soon as it is no longer required by the program. 


All requests for input from the console are prompted 
with a question mark. If more information is entered than 
was requested, or if insufficient information is entered, a 
warning occurs and ee aAsi re line of data must be entered 
again. A program may be terminated by typing a controj-Z 


followed by a carriage return in response to an input 


“request. 


Disk files may be read, written or updated by the 
BASIC*E programmer using both sequential and random access. 
There are two basic types of files: those with no declared 
record sizer which are referred to as unblocked, and those 
with user-specified record size. The latter are blocked 
files. Blocked files may be processed either sequentially 
or randomly, wht ie unblocked files must be accessed sequen= 
tially. All data in files is stored as ASCII characters. 
Either a comma or carriage return denotes the end of a 


field. Blanks are ianored between fields. 
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In unblocked files there is no concept of a record as 


such. Each reference to the file either reads from or 


writes to the next field. At the end of each <write State= 


ment> a carriage return and a linefeed are written to the 


file. Fhis orovides compatability with the operating system 


utilities such as TYPE and also allows files to be created 


by the text editor. 


Blocked files consist of a series of fixed length 


records. The user specifies the logical record length with 


the <file statement>. An error occurs if --@ -4s ifeteed is 


encountered during a read from. a Olotked ftle or 1 the 


current record being built exceeds the block size during a 


write. At the end of a <write statement> any remaining area 


in the record is filled with blanks, ang then a carriage 


return and linefeed are added. 








. | 


~ay s}46u II 
97] UBS 


@pIMPHOM 'PaAlas- 


“g'e'f) Ul @PEW “WO ‘Oupue 
“WSN GOO ‘DAW Sil. 462 


ad 


Ce 
DE 


OF 


DL 
DP 
ES 
FD 


agi 


FN 


FP 


MM 


NI 


NP 


NS 


APPENDIX A = COMPILER FRROR MESSAGES 


could not close file. 


Disk error. 


Could not create INT file; 


disk or directory 
te full .« 


Duplicate labels or syncronization error. 


Identifier in DIM statement previously defined. 


Identifier in FILE statement previously defined. 


Predefined function name previously defined. 


FUR loop index 


is not a simole floating point 
variable. 


Incorrect number of carameters iain function 
reference. 


Invalid parameter tyne in function reference. 


Function 1S undefined. 


Invalid character in BASIC statement. 


Exoression in IF statement 
point. 


Suoscrioted variable not previously dimensioned. 
Array name used as simple variable. 


Exoression is of tyoe string where only floating 
point is allowed. 


Expression contains string and floating point 
variables in mixed mode expression. 


Identifier following NEXT does not match FOR state= 
ment index. 


No applicable production exists. 


No BAS file found. 


is not of type floating= 
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NEXT statement without corresponding FOR statement. 
Incorrect number of subscripts. 

Compiler stack overflow. 

Symbol table overflow. 

Undefined label. 


VARC overflow. 





¢ 


AC 


38 2 
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APPENDIX B = RUN-TIME MONITOR ERROR MESSAGES 


Null string passed as voarameter to ASC function. 


Error chosing a fite. 


Disk read error (reading unwritten data in 
random access). 


Error writing to a file. 

Division by zero. 

Eof on disk file. no action specified. 
Exceeded record size on block file. 

Invalid input from the console. 

Invalid record number in random access. 
Accessing an unopened ‘file. 

Error attempting to create a file. 

File identifier too large or zero. 

Attempt to raise a number to a negative power, 
No INT file found in directory. 

Attempt to read past end of data area. 

Error attempting to open a file. 

Index in ON statement out of bounds. 

Attempt to read past end of record on blocked file. 
Unblocked file used with random access. 

Array suoscript out of bounds. 

String length exceeds 255. 

Second parameter of MIDS is negative. 


Attempt to evaluate tangent of pi over two. 


rs 


SE 
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APPENDIX C = BASIC=E GRAMMAR 


<program> ::= <line number> <statement> <cr> 


<line number> >= <number> 
§ 
i] 


<statement list> 

<if statement> 

<end statement> 
<dimension statement> 
<define statement> 


<statement> ¢: 


<statement list> ::= <simple statement> 
' <statement list> 3: 
<simole statement> 


<jet statement> 
<assiqnment> 

<for statement> 

<next statement> 
<file statement wa 
<close statement> 
<read statement> : 
<print statement> 
<goto statement> 
<gosub statement> 
<input statement> 
<stoo statement> 
<returnm statement> 
<on statement> 
<restore statement> 
<randomize statement> 
<out statement> 


<simple statement> 3:3 


<jet statement> 3:3:= let <assigqnment> 
<assignment> ::> <assign head> <expression> 
<assiaqn head> ::= <variable> = 


logical factor> 


<exoression> :3= 
' <exoression> <or> <logical factor> 


A A 


<“or* <:3= Of 
$ 
§ 


xor w 


<logical factor> 3:= <logical secondary> 
: logical factor> and 


A A 
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37 <logical secondary>., 


tN WW 
Cc ® 


<logical secondary> ::= <logical primary> 
; mot <logical primary> 


40 <logical momrimary> 3:= <arithmetic expression> 
41 : <arithmetic expression> 
4} <relation> 
ibe 4} <arithmetic expression> r 
2's5 4e <arithmetic expression> 3::= <term> 
a8 43 | <arithmetic expression> + 
Bro 43 <term> 
$39 44 1 <arithmetic expression> = 
23° a4 <term> 
» 4S ; + <term> 
: 46 + = <term> 
47 <term> :3:= <orimary> 
48 ; <term> * <primary> 
49 ; <term> / <primary> 
50 <primary> ::= <element> 
= : <primary> **x <element> 


<variable> 
<constant> 
<function call> 


S2 <element> 33 


ui 
SW 


S45 ( <expression> ) 
S56 <variable> s3:= <identifier> 
~ ; <suobscript head> <expression> ) 
S58  <subscript head> ::= <identifier> ( 
$9 + “subscriot head> <expression> , 
60 <function call> ::= <function heading> <expression> ) 
6} , <function name> 
6e <function heading> ::= <function name> ([ 
63 + <function heading> <expression> 
63 ’ 
64 <function name> $::= <userdefined name> 
65 ' <oredefined name> 
66 <constant> 33:5 <number> 
67 ; <string> 
68 <relation> :3= = 
69 ae ee 
ey 70 ; ge 
71 > = 
72 oe 
73 ie 
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74 
12 
76 


i 
id 


78 
79 


80 
81 


8e 
83 
84 


85 
86 


87 
88 


89 
89 


90 


91 
Te 


93 
94 


99 


96 
97 


96 


99 


100 


101 
101 


102 
103 
103 
103 


104 


> 


A 


Be 





<for statement> ::= <for head> to <expression> 
<steop clause> 


<for head> ::= <for> <assignment> 
<for> ::= for 

<step clause> °:= step <expression> 
<i f groun> 


<if else group> <statement list> 
if end # <expression> then <number> 


<if Statement> 3: 


<if group> ::= <if head> <statement list> 
' <if head> <number> 


<if else group> ::= <if head> <statement list> else 
<i f head> :3:= if <expression> then 


<define statement> ::= <ud function name> 
<dummy arg list> = <expression> we 


<ud function name> 3:3:= def <userdefined name> 


<dummy arg list> 3::= <dummy arg head> <identifier> ) 
i] 
] 


<dummy arg head> 3s= ( 
t 
? 


<dummy arg head> <identifier> , 
<file statement> ::= <file head> <file decleration> 


. 


<file head> dear « : 
7 ' <file head> <file decleration> , 


<fjle decleration> i:= <identifier> <file rec size> 
<file rec size> 3::= ( <exoression?> ) 
' 
<dimension statement> ::= dim 
<dimension variable list> 
<dimension variable Jlist> ::= <dimensiton variabdle> 
' 
<dimension variable list> ww 
, sdimension variable> 


<dimension variable> $:= <dim var head> <expression> } 
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105 <dim var head> !::= <identifier> ({ 
; <dim var head> <expression> , 


rd 
© 
o 


107 <close statement> ::= close <close list> 
108 <close list> ::= <expression> 
109 : <close Jist> » <expression> 

zee 110 <read statement> °:= read <file option> <read list> 

3) 5 111 1 read <read list> 

7,a8 

298 Lie <inout statement> :3= inout <oromot option> 

252 lie <read list> 

ue 

$° 113 <oromot option> :3:= <constant> 3 

» 114 : 

115 <read list> :3:= <variable> 
116 ; “<read list> » <variable> 
117 ' 
118 <print statement> $3= print <orint list> <print end> 
119 ; prine <tile option? <fite Tist> 
i2d <print list> ::= <expression> 
F2% + sorint list> <oprint delim> 

w lel <expression> 

| 12e ' 


123 K*+¥e-. 7 ¥et> -3 


ee 


= <expression> 
4 
? 


124 <file list> , <expression> 
125 <print end> ::= <print delim> 
126 H 
22. <file option> ::= # <exoression> 7 
128 ; # <expression> » <expression> ; 
129 <orint delim> s$3= ; 
130 cs 
PS; <goto statement> ::= <goto> <number> 
132 <on statement> ::= <on goto> <Jjlabel list> 
133 | <on gosub> <label list> 
134 <on goto> ::= on <expression> <goto> 
is> <on gosub> ::= on <expression> <gosub> 
136 -<label list> ::= <number> 

; <label list> » <number> 


138 <gosub statement> 33= <qosub> <number> 


a 





139 <goto> ::= goto 
140 a 





141 <gosub> 3:= gosub 
142 ; go SUD 
143 <next statement> ::= <next head> <identifier> 
144 , next 
@ 
29a 
i <next head> ::= next 
235 146 + “<next head> <jdentifier> ; 
‘48s 
<on7 x 2 
sg 147 <out statement> ::= out <exopression> », <expression> 
§20 
4% 
= 148 <return statement>  3:= return 
wo 
> 
149 <stop statement> ::= stop 
150 <end statement> ::= end 
Lt <restore statement> ::= restore 
152 <randomize statement> ::= randomize 
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APPENDIX D = COMPILER OPTIONS 


Option. Descriotion Default 
A List productions (for compiler debugging). Z OFF 
B List only source statements with errors. OFF 
. Do not create INT files syntax check only. OFF 
D Convert lowercase to upoercase. ON 
E Generate line number code. OFF 
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